home *** CD-ROM | disk | FTP | other *** search
/ L' Effet Pommier 3 / L'Effet Pommier - Volume 03.iso / Programmation / Alpha ƒ / Tcl / SystemCode / keyBindings.tcl < prev    next >
Text File  |  1996-01-19  |  3KB  |  120 lines
  1.  
  2. bind Left  backwardChar
  3. bind Left <c> beginningOfLine
  4. bind Left <s> backwardCharSelect
  5. bind Left <sc> beginningLineSelect
  6. bind Left <z> {scrollLeftCol 15}
  7. bind Left <o> backwardWord
  8. bind Left <os> backwardWordSelect
  9.  
  10. bind Right  forwardChar
  11. bind Right <c> endOfLine
  12. bind Right <s> forwardCharSelect
  13. bind Right <sc> endLineSelect
  14. bind Right <z> {scrollRightCol 15}
  15. bind Right <o> forwardWord
  16. bind Right <os> forwardWordSelect
  17.  
  18. bind Up  previousLine
  19. bind Up <s> prevLineSelect
  20. bind Up <c> beginningOfBuffer
  21. bind Up <sc> beginningBufferSelect
  22. bind Up <z> scrollUpLine
  23. bind Up <o> scrollUpLine
  24.  
  25. bind Down  nextLine
  26. bind Down <c> endOfBuffer
  27. bind Down <s> nextLineSelect
  28. bind Down <sc> endBufferSelect
  29. bind Down <z> scrollDownLine
  30. bind Down <o> scrollDownLine
  31.  
  32. # Keypad definitions
  33. bind KPad4  backwardWord                 
  34. bind KPad4   <c> backwardDeleteWord 
  35. bind KPad6   forwardWord                 
  36. bind KPad6   <c> deleteWord 
  37. bind Clear   toggleNumLock
  38. # Never bind Keypad /
  39. # Never bind Keypad *
  40. bind KPad0   pageBack                     
  41. bind Enter   pageForward
  42. ;bind KPad3   repeatSearchForward         
  43. ;bind KPad1   repeatSearchBackward     
  44. bind Kpad1 prevFunc
  45. bind Kpad3 nextFunc
  46. bind KPad.   endOfBuffer                 
  47. bind KPad5   exchangePointAndMark     
  48. bind KPad7   backwardDeleteWord         
  49. bind KPad9   deleteWord                 
  50. # bind 's' <z>     isearch            
  51. # bind 'r' <z>     rsearch            
  52. bind 't' <z>     insertToTop        
  53. bind 'z' <z>     pageBack
  54. bind "' '" <z>     setMark
  55. bind '1' <z>    execAbbrev
  56.  
  57. # bind F1         iconify                     
  58. # #bind  <c> F1     wordCompletion 
  59. # bind F2         cut                         
  60. # bind F3         copy                         
  61. # bind F4         yank                         
  62. # #bind F5         prevWindow
  63. # #bind F6        nextWindow
  64. # bind F7            tiled
  65. # bind F8            swapWithNext
  66. # bind F9         pushMark
  67. # bind F11        shrinkHigh
  68. # bind F12        shrinkLow
  69. # #bind F13        startKeyboardMacro         
  70. # #bind F14        endKeyboardMacro             
  71. # #bind F15        executeKeyboardMacro         
  72.  
  73. bind Del        deleteChar                 
  74. bind Help       alphaHelp                     
  75. bind Home       beginningOfBuffer             
  76. bind End        endOfBuffer                 
  77. bind Pgup       pageBack                     
  78. bind Pgdn       pageForward                  
  79.  
  80. # Another control prefix.
  81. bind 'q' <z>     prefixChar
  82. bind 't' <Q>    shrinkHigh
  83. bind 'b' <Q>    shrinkLow
  84. bind 'l' <Q>    shrinkLeft
  85. bind 'r' <Q>    shrinkRight
  86. bind 'c' <Q>    chooseAWindow
  87. bind 'h' <Q>    winhorizontally
  88. bind 'i' <Q>    iconify
  89. bind 'n' <Q>    nextWindow
  90. bind 'o' <Q>    bufferOtherWindow
  91. bind 'p' <Q>    prevWindow
  92. bind 's' <Q>    swapWithNext
  93. bind 'a' <Q>    wintiled
  94. bind 'v' <Q>    winvertically
  95. bind 'f' <Q>    shrinkFull
  96. bind '2' <Q>    splitWindow
  97.  
  98. bind ' ' <o>    oneSpace
  99. bind 'l' <c>    load
  100.  
  101. #bind 'w' <zs>    rectMarkHilite
  102. bind '\r'        carriageReturn
  103. bind '\t'         tclFileCompletion "Shel"
  104. ascii 0x1b        startEscape
  105. ascii 0x8        backSpace
  106. bind '\t' <z>     doATab Tcl
  107. bind '\t' <z>     doATab C
  108. bind '\t' <z>     doATab C++
  109. #bind 's' <zoc>    spacesToTabs
  110. #bind 't' <zoc>    tabsToSpaces
  111. # bind 'a' <zo>    insertAscii
  112. # bind 'a' <zos>    getAscii
  113. bind 'f' <cz>     freeMem
  114. # bind 't' <e>     findTag 
  115. bind 'm' <X>    matchingLines 
  116.  
  117.  
  118. # <ctrl>-` bound to 'wordCompletion'
  119. bind 0x32 <z> wordCompletion
  120.